home *** CD-ROM | disk | FTP | other *** search
/ Compendium Deluxe 2 / LSD and 17bit Compendium Deluxe - Volume II.iso / a / prog / asmsrc / phagexsources.lha / source / SpriteMover.s < prev    next >
Text File  |  1993-08-20  |  337b  |  28 lines
  1.     Lea    Sprite0(pc),a0
  2.     Move.w    XPos(pc),d0
  3.     Move.w    YPos(pc),d1
  4.  
  5.     Move.b    d0,d2
  6.     And.b    #1,d2
  7.     Lsr.w    #1,d0
  8.     Btst    #8,d1
  9.     Beq    NoSetBit1
  10.     Or.b    #%100,d2
  11. NoSetBit1    Move.b    d1,(a0)+
  12.     Move.b    d0,(a0)+
  13.     Add.w    #9,d1
  14.     Btst    #8,d1
  15.     Beq    NoSetBit2
  16.     Or.b    #%10,d2
  17. NoSetBit2    Move.b    d1,(a0)+
  18.     Move.b    d2,(a0)
  19.     Rts
  20.  
  21. XPos    Dc.w    0
  22. YPos    Dc.w    0
  23.  
  24. Sprite0    Dc.w    0,0,0,0
  25.  
  26.  
  27.  
  28.